/*
 * Copyright (C) 2005-2011 MaNGOS <http://www.getmangos.com/>
 *
 * Copyright (C) 2008-2011 Trinity <http://www.trinitycore.org/>
 *
 * Copyright (C) 2006-2011 ScriptDev2 <http://www.scriptdev2.com/>
 *
 * Copyright (C) 2010-2011 ProjectSkyfire <http://www.projectskyfire.org/>
 * 
 * Copyright (C) 2011 ArkCORE <http://www.arkania.net/>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
 */

#include "ScriptPCH.h"
#include "naxxramas.h"

enum Yells {
	SAY_GREET = -1533009,
	SAY_AGGRO_1 = -1533010,
	SAY_AGGRO_2 = -1533011,
	SAY_AGGRO_3 = -1533012,
	SAY_AGGRO_4 = -1533013,
	SAY_SLAY_1 = -1533014,
	SAY_SLAY_2 = -1533015,
	SAY_DEATH = -1533016
};
//#define SOUND_RANDOM_AGGRO  8955                            //soundId containing the 4 aggro sounds, we not using this

enum Spells {
	SPELL_POISON_BOLT_VOLLEY = 28796,
	H_SPELL_POISON_BOLT_VOLLEY = 54098,
	SPELL_RAIN_OF_FIRE = 28794,
	H_SPELL_RAIN_OF_FIRE = 54099,
	SPELL_FRENZY = 28798,
	H_SPELL_FRENZY = 54100,
	SPELL_WIDOWS_EMBRACE = 28732,
	H_SPELL_WIDOWS_EMBRACE = 54097
};

enum Events {
	EVENT_NONE, EVENT_POISON, EVENT_FIRE, EVENT_FRENZY
};

enum Achievements {
	ACHIEVEMENT_MOMMA_SAID_KNOCK_YOU_OUT_10 = 1997,
	ACHIEVEMENT_MOMMA_SAID_KNOCK_YOU_OUT_25 = 2140
};

class boss_faerlina: public CreatureScript {
public:
	boss_faerlina() :
			CreatureScript("boss_faerlina") {
	}

	CreatureAI* GetAI(Creature* pCreature) const {
		return new boss_faerlinaAI(pCreature);
	}

	struct boss_faerlinaAI: public BossAI {
		boss_faerlinaAI(Creature *c) :
				BossAI(c, BOSS_FAERLINA), greet(false) {
			me->ApplySpellImmune(0, IMMUNITY_EFFECT, SPELL_EFFECT_KNOCK_BACK,
					true);
			me->ApplySpellImmune(0, IMMUNITY_MECHANIC, MECHANIC_GRIP, true);
		}

		bool greet;
		bool doDelayFrenzy;
		bool bAchievement;

		void EnterCombat(Unit * /*who*/) {
			_EnterCombat();
			DoScriptText(
					RAND(SAY_AGGRO_1, SAY_AGGRO_2, SAY_AGGRO_3, SAY_AGGRO_4),
					me);
			events.ScheduleEvent(EVENT_POISON, urand(10000, 15000));
			events.ScheduleEvent(EVENT_FIRE, urand(6000, 18000));
			events.ScheduleEvent(EVENT_FRENZY, urand(60000, 80000));
		}

		void Reset() {
			doDelayFrenzy = false;
			bAchievement = true;
			_Reset();
		}

		void MoveInLineOfSight(Unit *who) {
			if (!greet && who->GetTypeId() == TYPEID_PLAYER) {
				DoScriptText(SAY_GREET, me);
				greet = true;
			}
			BossAI::MoveInLineOfSight(who);
		}

		void KilledUnit(Unit* /*victim*/) {
			if (!(rand() % 3))
				DoScriptText(RAND(SAY_SLAY_1, SAY_SLAY_2), me);
		}

		void JustDied(Unit* /*Killer*/) {
			_JustDied();

			DoScriptText(SAY_DEATH, me);

			if (bAchievement)
				instance->DoCompleteAchievement(
						RAID_MODE(ACHIEVEMENT_MOMMA_SAID_KNOCK_YOU_OUT_10,
								ACHIEVEMENT_MOMMA_SAID_KNOCK_YOU_OUT_25));
		}

		void UpdateAI(const uint32 diff) {
			if (!UpdateVictim())
				return;

			if (doDelayFrenzy
					&& !me->HasAura(
							RAID_MODE(SPELL_WIDOWS_EMBRACE,
									H_SPELL_WIDOWS_EMBRACE))) {
				doDelayFrenzy = false;
				DoCast(me, RAID_MODE(SPELL_FRENZY, H_SPELL_FRENZY), true);
			}

			events.Update(diff);

			if (me->HasUnitState(UNIT_STAT_CASTING))
				return;

			while (uint32 eventId = events.ExecuteEvent()) {
				switch (eventId) {
				case EVENT_POISON:
					if (!me->HasAura(
							RAID_MODE(SPELL_WIDOWS_EMBRACE,
									H_SPELL_WIDOWS_EMBRACE)))
						DoCastAOE(
								RAID_MODE(SPELL_POISON_BOLT_VOLLEY,
										H_SPELL_POISON_BOLT_VOLLEY));
					events.ScheduleEvent(EVENT_POISON, urand(8000, 15000));
					break;
				case EVENT_FIRE:
					if (Unit *pTarget = SelectUnit(SELECT_TARGET_RANDOM, 0))
						DoCast(
								pTarget,
								RAID_MODE(SPELL_RAIN_OF_FIRE,
										H_SPELL_RAIN_OF_FIRE));
					events.ScheduleEvent(EVENT_FIRE, urand(6000, 18000));
					break;
				case EVENT_FRENZY:
					// TODO : Add Text
					if (!me->HasAura(
							RAID_MODE(SPELL_WIDOWS_EMBRACE,
									H_SPELL_WIDOWS_EMBRACE)))
						DoCast(me, RAID_MODE(SPELL_FRENZY, H_SPELL_FRENZY));
					else
						doDelayFrenzy = true;

					events.ScheduleEvent(EVENT_FRENZY, urand(60000, 80000));
					break;
				}
			}

			DoMeleeAttackIfReady();
		}

		void SpellHit(Unit* caster, const SpellEntry *spell) {
			if (spell->Id == SPELL_WIDOWS_EMBRACE
					|| spell->Id == H_SPELL_WIDOWS_EMBRACE) {
				// TODO : Add Text
				bAchievement = false;
				doDelayFrenzy = true;
				me->Kill(caster);
			}
		}
	};
};

class mob_faerlina_add: public CreatureScript {
public:
	mob_faerlina_add() :
			CreatureScript("mob_faerlina_add") {
	}

	CreatureAI* GetAI(Creature* pCreature) const {
		return new mob_faerlina_addAI(pCreature);
	}

	struct mob_faerlina_addAI: public ScriptedAI {
		mob_faerlina_addAI(Creature* pCreature) :
				ScriptedAI(pCreature) {
			pInstance = pCreature->GetInstanceScript();
		}

		InstanceScript *pInstance;

		void Reset() {
			if (getDifficulty() == RAID_DIFFICULTY_10MAN_NORMAL) {
				me->ApplySpellImmune(0, IMMUNITY_MECHANIC, SPELL_EFFECT_BIND,
						true);
				me->ApplySpellImmune(0, IMMUNITY_MECHANIC, MECHANIC_CHARM,
						true);
			}
		}

		void JustDied(Unit * /*killer*/) {
			if (pInstance && getDifficulty() == RAID_DIFFICULTY_10MAN_NORMAL) {
				if (Creature *pFaerlina = pInstance->instance->GetCreature(pInstance->GetData64(DATA_FAERLINA)))
					DoCast(pFaerlina, SPELL_WIDOWS_EMBRACE);
			}
		}
	};
};

void AddSC_boss_faerlina() {
	new boss_faerlina();
	new mob_faerlina_add();
}
